1 FOR r=10 TO 500 STEP 30:FOR x=100 TO 1200 STEP r:SOUND x,2.05:NEXT
2 FOR x=1200 TO 100 STEP -r:SOUND x,2.05:NEXT x:NEXT r:END